inherited FGeraPagamentoProgramadoAvulso: TFGeraPagamentoProgramadoAvulso
  Left = 267
  Top = 170
  Width = 787
  Height = 503
  Caption = 'Gera Pagamento programado Avulso'
  Constraints.MinHeight = 503
  Constraints.MinWidth = 787
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    Width = 779
    Height = 469
    ActivePage = tsUsuario
    TabIndex = 1
    inherited TsPesquisa: TTabSheet
      TabVisible = False
      inherited pnPesquisa: TPanel
        Top = 381
        Width = 771
      end
      inherited dbgPesquisaPadra: TDBGrid
        Width = 771
        Height = 324
      end
      inherited pnPesquisaPadrao: TPanel
        Width = 771
      end
    end
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        Width = 771
        Height = 438
        object Label6: TLabel [0]
          Left = 5
          Top = 128
          Width = 65
          Height = 16
          Caption = 'Fornecedor'
        end
        object Label7: TLabel [1]
          Left = 359
          Top = 128
          Width = 49
          Height = 16
          Caption = 'Portador'
        end
        object Label8: TLabel [2]
          Left = 5
          Top = 181
          Width = 141
          Height = 16
          Caption = 'Classifica'#231#227'o Financeira'
        end
        object Label4: TLabel [3]
          Left = 359
          Top = 235
          Width = 51
          Height = 16
          Caption = 'Hist'#243'rico'
        end
        object Label13: TLabel [4]
          Left = 359
          Top = 181
          Width = 94
          Height = 16
          Caption = 'Centro de Custo'
        end
        object Label17: TLabel [5]
          Left = 5
          Top = 235
          Width = 85
          Height = 16
          Caption = 'Conta Cont'#225'bil'
        end
        object DBText3: TDBText [6]
          Left = 107
          Top = 235
          Width = 50
          Height = 16
          AutoSize = True
          DataField = 'PLANOCONT_CODIGOCONTABIL'
        end
        object Label18: TLabel [7]
          Left = 5
          Top = 48
          Width = 103
          Height = 16
          Caption = 'Fonte de Recurso'
        end
        inherited panel2: TPanel
          Width = 769
          TabOrder = 10
          inherited SBAtualiza: TSpeedButton
            Left = 238
          end
          inherited BtnIncluir: TBitBtn
            Tag = 5
            Caption = '&Executar'
          end
          inherited BtnEditar: TBitBtn
            Left = 209
            Visible = False
          end
          inherited BtnFechar: TBitBtn
            Tag = 5
            Left = 670
          end
          inherited BtnExcluir: TBitBtn
            Visible = False
          end
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
            Visible = False
          end
        end
        inherited panel3: TPanel
          Top = 413
          Width = 769
          Height = 3
          TabOrder = 11
          inherited BtnConsuta: TBitBtn
            Visible = False
          end
          inherited BtnSalvar: TBitBtn
            Left = 207
            Visible = False
          end
          inherited BtnCancelar: TBitBtn
            Left = 209
            Visible = False
          end
        end
        object DBLCBFornecedor: TDBLookupComboBox
          Tag = 5
          Left = 5
          Top = 148
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'FORN_CODIGO'
          ListField = 'FORN_RAZAO'
          ListSource = DSFornecedor
          ParentCtl3D = False
          TabOrder = 2
          OnKeyDown = DBLCBFornecedorKeyDown
        end
        object DBLCBPortador: TDBLookupComboBox
          Tag = 5
          Left = 359
          Top = 148
          Width = 339
          Height = 22
          Ctl3D = False
          KeyField = 'PORT_CODIGO'
          ListField = 'PORT_DESCRICAO'
          ListSource = DSPortador
          ParentCtl3D = False
          TabOrder = 3
          OnEnter = DBLCBPortadorEnter
          OnKeyDown = DBLCBFornecedorKeyDown
        end
        object DBLCBPlano: TDBLookupComboBox
          Tag = 5
          Left = 5
          Top = 198
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'CODIGO'
          ListField = 'DESCRICAO'
          ListSource = DSPlano
          ParentCtl3D = False
          TabOrder = 4
          OnExit = DBLCBPlanoExit
          OnKeyDown = DBLCBPlanoKeyDown
        end
        object DBLCBCentroCusto: TDBLookupComboBox
          Tag = 5
          Left = 359
          Top = 198
          Width = 339
          Height = 22
          Ctl3D = False
          KeyField = 'CODIGO'
          ListField = 'DESCRICAO'
          ListSource = DSCentro
          ParentCtl3D = False
          TabOrder = 5
          OnEnter = DBLCBCentroCustoEnter
          OnKeyDown = DBLCBFornecedorKeyDown
        end
        object DBLCBContaContabil: TDBLookupComboBox
          Tag = 5
          Left = 5
          Top = 252
          Width = 338
          Height = 22
          Hint = '(F7 - Todo , F8 -Relacionados)'
          Ctl3D = False
          KeyField = 'PLANOCONT_CODIGO'
          ListField = 'PLANOCONT_DESCRICAO'
          ListSource = DSPlanoContabil
          ParentCtl3D = False
          TabOrder = 6
          OnClick = DBLCBContaContabilClick
          OnKeyDown = DBLCBContaContabilKeyDown
          OnKeyUp = DBLCBContaContabilKeyUp
        end
        object EHistorico1: TEdit
          Tag = 5
          Left = 359
          Top = 252
          Width = 339
          Height = 22
          Ctl3D = False
          MaxLength = 50
          ParentCtl3D = False
          TabOrder = 7
        end
        object EHistorico2: TEdit
          Tag = 5
          Left = 359
          Top = 274
          Width = 339
          Height = 22
          Ctl3D = False
          MaxLength = 50
          ParentCtl3D = False
          TabOrder = 8
        end
        object ProgressBar: TProgressBar
          Left = 1
          Top = 416
          Width = 769
          Height = 21
          Align = alBottom
          Min = 0
          Max = 100
          Step = 1
          TabOrder = 12
        end
        object DBLFonteRecurso: TDBLookupComboBox
          Tag = 5
          Left = 5
          Top = 66
          Width = 338
          Height = 22
          Ctl3D = False
          KeyField = 'FONT_CODIGO'
          ListField = 'FONT_DESCRICAO'
          ListSource = dsFonteRecurso
          ParentCtl3D = False
          TabOrder = 0
          OnKeyDown = DBLFonteRecursoKeyDown
        end
        object gbDocumento: TGroupBox
          Left = 359
          Top = 50
          Width = 410
          Height = 69
          Caption = '  Documento  '
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 1
          object Label10: TLabel
            Left = 14
            Top = 16
            Width = 24
            Height = 16
            Caption = 'Tipo'
          end
          object Label16: TLabel
            Left = 207
            Top = 16
            Width = 45
            Height = 16
            Caption = 'N'#250'mero'
          end
          object Label19: TLabel
            Left = 287
            Top = 16
            Width = 27
            Height = 16
            Caption = 'Data'
          end
          object DBLCBTipoDocumento: TDBLookupComboBox
            Tag = 5
            Left = 9
            Top = 36
            Width = 188
            Height = 22
            KeyField = 'TIPO_DOC_CODIGO'
            ListField = 'TIPO_DOC_DESCRICAO'
            ListSource = DSTipoDocumento
            TabOrder = 0
            OnKeyDown = DBLCBFornecedorKeyDown
          end
          object EDocumento: TEdit
            Tag = 5
            Left = 207
            Top = 36
            Width = 70
            Height = 22
            MaxLength = 6
            TabOrder = 1
          end
          object DTDataDocumento: TDateEdit
            Tag = 5
            Left = 286
            Top = 36
            Width = 113
            Height = 23
            ButtonWidth = 26
            NumGlyphs = 2
            TabOrder = 2
          end
        end
        object PFinanceiro: TPanel
          Left = 1
          Top = 279
          Width = 769
          Height = 134
          Align = alBottom
          TabOrder = 9
          object Label1: TLabel
            Left = 5
            Top = 10
            Width = 64
            Height = 16
            Caption = 'Data Inicial'
          end
          object Label2: TLabel
            Left = 6
            Top = 41
            Width = 95
            Height = 16
            Caption = 'Intervalo de Dias'
          end
          object Label9: TLabel
            Left = 358
            Top = 10
            Width = 158
            Height = 16
            Caption = 'Quantidade de  Presta'#231#245'es'
          end
          object Label11: TLabel
            Left = 358
            Top = 41
            Width = 62
            Height = 16
            Caption = 'Valor Total'
          end
          object Label12: TLabel
            Left = 358
            Top = 71
            Width = 126
            Height = 16
            Caption = 'Valor da 1'#170' Presta'#231#227'o'
          end
          object Label15: TLabel
            Left = 358
            Top = 102
            Width = 215
            Height = 16
            Caption = 'Valor da(s) Pr'#243'xima(s) Presta'#231#245'es(s)'
          end
          object Label3: TLabel
            Left = 6
            Top = 71
            Width = 61
            Height = 16
            Caption = 'Fixar dia ?'
          end
          object Bevel1: TBevel
            Left = 335
            Top = 0
            Width = 2
            Height = 370
          end
          object DEDataInicial: TDateEdit
            Tag = 5
            Left = 162
            Top = 10
            Width = 114
            Height = 26
            Ctl3D = False
            ButtonWidth = 26
            NumGlyphs = 2
            ParentCtl3D = False
            TabOrder = 0
          end
          object EIntervaloDias: TEdit
            Tag = 5
            Left = 162
            Top = 41
            Width = 74
            Height = 22
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 1
            OnEnter = EIntervaloDiasEnter
            OnExit = EIntervaloDiasExit
            OnKeyPress = EIntervaloDiasKeyPress
          end
          object RGDiaVencimentoFixo: TRadioGroup
            Left = 16
            Top = 127
            Width = 271
            Height = 40
            Caption = '  Dia Vencimento Fixo  '
            Columns = 2
            Ctl3D = False
            ItemIndex = 1
            Items.Strings = (
              'Sim'
              'N'#227'o')
            ParentCtl3D = False
            TabOrder = 4
            Visible = False
          end
          object ENumeroPrestacao: TEdit
            Tag = 5
            Left = 572
            Top = 10
            Width = 48
            Height = 22
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 5
            OnEnter = ENumeroPrestacaoEnter
            OnExit = ENumeroPrestacaoExit
            OnKeyPress = EIntervaloDiasKeyPress
          end
          object EValorTotal: TEdit
            Tag = 5
            Left = 572
            Top = 41
            Width = 88
            Height = 22
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 6
            OnEnter = EValorTotalEnter
            OnExit = EValorTotalExit
            OnKeyPress = EValorTotalKeyPress
          end
          object EValorPrimeiraPrestacao: TEdit
            Tag = 5
            Left = 572
            Top = 71
            Width = 88
            Height = 22
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 7
            OnEnter = EValorPrimeiraPrestacaoEnter
            OnExit = EValorPrimeiraPrestacaoExit
            OnKeyPress = EValorTotalKeyPress
          end
          object EValorProximaPrestacao: TEdit
            Tag = 5
            Left = 574
            Top = 102
            Width = 87
            Height = 22
            Ctl3D = False
            ParentCtl3D = False
            TabOrder = 8
            OnEnter = EValorProximaPrestacaoEnter
            OnExit = EValorProximaPrestacaoExit
            OnKeyPress = EValorTotalKeyPress
          end
          object BAjutarValor: TButton
            Tag = 5
            Left = 670
            Top = 71
            Width = 97
            Height = 55
            Caption = 'Ajustar Valor'
            TabOrder = 9
            OnClick = BAjutarValorClick
          end
          object CheckBNao: TCheckBox
            Left = 222
            Top = 71
            Width = 52
            Height = 21
            Caption = 'N'#227'o'
            Checked = True
            State = cbChecked
            TabOrder = 3
            OnClick = CheckBNaoClick
          end
          object CheckBSim: TCheckBox
            Left = 162
            Top = 71
            Width = 53
            Height = 21
            Caption = 'Sim'
            TabOrder = 2
            OnClick = CheckBSimClick
          end
        end
      end
    end
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'Select first 1 * from ContasPagar')
  end
  object DSFornecedor: TDataSource
    DataSet = DMGestao.QFornecedor
    Left = 184
    Top = 464
  end
  object DSTipoDocumento: TDataSource
    DataSet = DMFinanceiro.QTipoDocumento
    Left = 256
    Top = 480
  end
  object DSPortador: TDataSource
    DataSet = DMFinanceiro.Qportador
    Left = 496
    Top = 480
  end
  object DSPlano: TDataSource
    DataSet = DMFinanceiro.QPlanoSaida
    Left = 128
    Top = 416
  end
  object DSCentro: TDataSource
    DataSet = DMFinanceiro.QCentro
    Left = 80
    Top = 456
  end
  object QPlanoContabil: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'select * from PlanoContabilidade'
      'Where CodigoEmpresa = :Emp'
      'Order By PlanoCont_CodigoContabil')
    Left = 390
    Top = 482
    ParamData = <
      item
        DataType = ftString
        Name = 'Emp'
        ParamType = ptUnknown
        Value = '1'
      end>
  end
  object DSPlanoContabil: TDataSource
    DataSet = QPlanoContabil
    Left = 422
    Top = 482
  end
  object QContasPagar: TQuery
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'select * from PlanoContabilidade'
      'Where CodigoEmpresa = :Emp'
      'Order By PlanoCont_CodigoContabil')
    Left = 166
    Top = 474
    ParamData = <
      item
        DataType = ftString
        Name = 'Emp'
        ParamType = ptUnknown
        Value = '1'
      end>
  end
  object dsFonteRecurso: TDataSource
    DataSet = DMFinanceiro.QFonteRecurso
    Left = 318
    Top = 453
  end
end
